home *** CD-ROM | disk | FTP | other *** search
/ Chip 1996 November / Chip 11-96.iso / treiber / drucker / lexmark / 4039_xxx / win3x / ps1 / 4039ps1.exe / WD5539PS.ZIP / POSTSCRP.INI < prev    next >
Text File  |  1993-01-21  |  15KB  |  359 lines

  1. %!PS-Adobe-2.0 ExitServer
  2. %%Title: Microsoft Word Driver Prolog
  3. %%Creator: Microsoft
  4. %%CreationDate: Thu Jul 5 1990
  5. %%BeginDocument: Microsoft Word 5.x 0
  6. %%msinifile: POSTSCRP
  7. %%EndComments
  8. userdict /msinifile known 
  9. {msinifile (POSTSCRP) eq {stop} if} if
  10. %%BeginExitServer: 0
  11.   serverdict begin 0 exitserver
  12. %%EndExitServer
  13. userdict /msorigstate known {msorigstate restore} if
  14. save /msorigstate exch def
  15. /msinifile (POSTSCRP) def
  16.  
  17. /PSl {msdict begin msinit /landscape true def /ptop 612 def 90 rotate} def
  18. /PSp {msdict begin msinit /landscape false def /ptop 792 def} def
  19.  
  20. %%BeginFont: mslinedraw
  21. /mslinedraw 25 dict def
  22. mslinedraw begin
  23. /FontType 3 def
  24. /FontMatrix [1.0 30.0 div 0 0 1.0 30.0 div 0 0] def
  25. /FontBBox [0 -8 18 30] def
  26. /Encoding 256 array def
  27. 0 1 255 {Encoding exch /.notdef put} for
  28. Encoding 45 [
  29.  /sh   /sh   /sh /light /med /dark
  30.  /sv   /srj  /sdjr /dsjr /sdtr /dstr /djr  /dv
  31.  /dtr  /dbr  /sdbr /dsbr /str  /sbl  /sjb  /sjt
  32.  /sjl  /sh   /sjc  /sdjl /dsjl /dbl  /dtl  /djb
  33.  /djt  /djl  /dh   /djc  /dsjb /sdjb /dsjt /sdjt
  34.  /sdbl /dsbl /dstl /sdtl  /sdjc /dsjc /sbr  /stl
  35.  /black /bb /bl /br /bt] putinterval
  36.  
  37. /pl {transform 0.1 sub round 0.1 add exch
  38.  0.1 sub round 0.1 add exch itransform} bind def
  39. /moveto {pl moveto} bind def
  40. /lineto {pl lineto} bind def
  41.  
  42. /a {moveto lineto stroke} bind def
  43. /b {moveto lineto lineto stroke} bind def
  44. /c {moveto 9 7 lineto stroke} bind def
  45. /d {moveto lineto lineto} bind def
  46. /e {lineto closepath fill} bind def
  47. /f {7 22 7 9 0 9 b} def
  48. /g {12 22 12 9 18 9 b} def
  49. /h {7 -8 7 5 0 5 b} def
  50. /i {12 -8 12 5 18 5 b} def
  51. /j {0 7 18 7 a} def
  52. /k {9 22 9 -8 a} def
  53. /l {0 5 18 5 a 0 9 18 9 a} def
  54. /m {7 22 7 -8 a 12 22 12 -8 a} def
  55. /n {0 -8 18 -8 18 22 d 0 22 e} def
  56.  
  57. /CharProcs 55 dict def
  58. CharProcs begin
  59. /.notdef {} def
  60. /sp { 1 1 moveto } def
  61. /sv {k} def
  62. /srj {k 0 7 c} def
  63. /sdjr {k 0 5 9 5 a 0 9 9 9 a} def
  64. /dsjr {m 0 7 7 7 a} def
  65. /sdtr {0 7 12 7 12 -8 b 7 7 7 -8 a} def
  66. /dstr {0 9 9 9 9 -8 b 0 5 9 5 a} def
  67. /djr {f h 12 -8 12 22 a} def
  68. /dv {m} def
  69. /dtr {h 0 9 12 9 12 -8 b} def
  70. /dbr {f  0 5 12 5 12 22 b} def
  71. /sdbr {0 7 12 7 12 22 b 7 7 7 22 a} def
  72. /dsbr {0 5 9 5 9 22 b 0 9 9 9 a} def
  73. /str {0 7 9 7 9 -8 b} def
  74. /sbl {9 22 9 7 18 7 b} def
  75. /sjb {j 9 22 c} def
  76. /sjt {j 9 -8 c} def
  77. /sjl {k 18 7 c} def
  78. /sh {j} def
  79. /sjc {j k} def
  80. /sdjl {k 9 9 18 9 a 9 5 18 5 a} def
  81. /dsjl {m 12 7 18 7 a} def
  82. /dbl {g 7 22 7 5 18 5 b} def
  83. /dtl {i 7 -8 7 9 18 9 b} def
  84. /djb {f g 0 5 18 5 a} def
  85. /djt {h i 0 9 18 9 a} def
  86. /djl {g i 7 -8 7 22 a} def
  87. /dh {l} def
  88. /djc {f g h i} def
  89. /dsjb {l 9 22 9 9 a} def
  90. /sdjb {j 7 7 7 22 a 12 7 12 22 a} def
  91. /dsjt {l 9 -8 9 5 a} def
  92. /sdjt {j 7 7 7 -8 a 12 7 12 -8 a} def
  93. /sdbl {7 22 7 7 18 7 b 12 22 12 7 a} def
  94. /dsbl {9 22 9 5 18 5 b 9 9 18 9 a} def
  95. /dstl {9 -8 9 9 18 9 b 9 5 18 5 a} def
  96. /sdtl {7 -8 7 7 18 7 b 12 -8 12 7 a} def
  97. /sdjc {m j} def
  98. /dsjc {l k} def
  99. /sbr {0 7 9 7 9 22 b} def
  100. /stl {9 -8 9 7 18 7 b} def
  101. /light {0.90 setgray n} def
  102. /med {0.60 setgray n} def
  103. /dark {0.30 setgray n} def
  104. /black {n} def
  105. /bt {0 7 18 7 18 22 d 0 22 e} def
  106. /bb {0 -8 18 -8 18 7 d 0 7 e} def
  107. /bl {0 -8 9 -8 9 22 d 0 22 e} def
  108. /br {9 -8 18 -8 18 22 d 9 22 e} def
  109. end %CharProcs
  110.  
  111. /BuildChar
  112.   { fs 1 and 0 eq {1} {3} ifelse setlinewidth
  113.     18 0 setcharwidth
  114.     exch begin
  115.      Encoding exch get
  116.      CharProcs exch get
  117.      exec
  118.     end
  119.   } def
  120. end %mslinedraw
  121. %%EndFont
  122.  
  123. FontDirectory /LineDraw known not
  124.  {/LineDraw mslinedraw definefont pop} if
  125.  
  126. %%BeginProcSet: msdict 1.5 0
  127. /msdict 120 dict def
  128. msdict begin
  129. /PSe {end} def
  130. /SLL {pop} def
  131. /P {exch msu exch msu neg ptop add moveto} bind def
  132. /S {sw 0 32 4 -1 roll widthshow} bind def
  133. /C {1 string dup 0 4 -1 roll put S} bind def
  134. /J {msu ( ) stringwidth pop sub /sw exch def} bind def
  135. /PE {showpage ptop exch restore save exch /ptop exch def} def
  136. /SFL {landscape {dup msu neg 0 exch translate} if
  137.  msu /ptop exch def save} def
  138. /B1 {statusdict begin papertray 1 ne {1 setpapertray end} {end} ifelse} def
  139. /B2 {statusdict begin papertray 2 ne {2 setpapertray end} {end} ifelse} def
  140. /B3 {statusdict begin papertray 3 ne {3 setpapertray end} {end} ifelse} def
  141. /BENV {} def
  142. %%BeginModelCheck
  143. statusdict begin product end dup length string cvs /msprod exch def
  144. msprod (OmniLaser) eq msprod (RX7100PS) eq or msprod (OL840) eq or msprod (LaserPrinter15) eq or
  145.  {/B1 {statusdict begin papertray 0 ne {0 setpapertray end} {end} ifelse} def
  146.   /B2 {statusdict begin papertray 1 ne {1 setpapertray end} {end} ifelse} def
  147.   /B3 {} def
  148.   /BENV {} def} if
  149. msprod 0 16 getinterval (IBM LaserPrinter) eq
  150.  {/B1 {statusdict begin papertray 0 ne {0 setpapertray end} {end} ifelse} def
  151.   /B2 {statusdict begin papertray 1 ne {1 setpapertray end} {end} ifelse} def
  152.   /B3 {} def
  153.   /BENV {statusdict begin papertray 2 ne {2 setpapertray end} {end} ifelse} def} if
  154. msprod 0 2 getinterval (HP) eq msprod (Hewlett-Packard LaserJet IIISi) eq or
  155.  {/B1 {statusdict begin papertray 0 ne {0 setpapertray end} {end} ifelse} def
  156.   /B2 {statusdict begin papertray 1 ne {1 setpapertray end} {end} ifelse} def
  157.   /B3 {} def
  158.   /BENV {statusdict begin papertray 2 ne {2 setpapertray end} {end} ifelse} def} if
  159. msprod (IBM Personal Page Printer II) eq
  160.  {/B1 {statusdict begin papertray 1 ne {1 setpapertray end} {end} ifelse} def
  161.   /B2 {statusdict begin papertray 2 ne {2 setpapertray end} {end} ifelse} def
  162.   /B3 {} def
  163.   /BENV {statusdict begin papertray 3 ne {3 setpapertray end} {end} ifelse} def} if
  164. % Add other printer specific tray orderings here.
  165. %%EndModelCheck
  166. /MB {statusdict begin /manualfeed true store end} def
  167. /ME {statusdict begin /manualfeed false store end} def
  168. /DB {statusdict begin true setduplexmode end} def
  169. /DE {statusdict begin false setduplexmode end} def
  170. /B {fs 2 and 0 eq {Bft} {BIft} ifelse
  171.  ftsz scalefont setfont fs 1 or /fs exch def} bind def
  172. /I {fs 1 and 0 eq {Ift} {BIft} ifelse
  173.  ftsz scalefont setfont fs 2 or /fs exch def} bind def
  174. /BI {BIft ftsz scalefont setfont fs 
  175.  2 or 1 or /fs exch def} bind def
  176. /E {Eft ftsz scalefont setfont /fs 0 def} bind def
  177. /F {/ftsz exch def (-) stringwidth pop 2 div neg /STh exch def
  178.  /ftcd exch def 0 2 fonttable length 1 sub {dup fonttable exch 
  179.  get ftcd eq {1 add fonttable exch get fontset exit} {pop}
  180.  ifelse} for E} bind def
  181. /LU {currentpoint /uy exch def /ux exch def 1 ssm} bind def
  182. /LD {currentpoint /uy exch def /ux exch def 2 ssm} bind def
  183. /LS {currentpoint /suy exch def /sux exch def 4 ssm} bind def
  184. /LL {currentpoint /luy exch def /lux exch def /ldmode exch def 8 ssm} bind def
  185. /LE {smode 1 and 0 ne {false (_) ul} if
  186.      smode 2 and 0 ne {true (_) ul} if
  187.      smode 4 and 0 ne {false (\352) ul} if
  188.      smode 8 and 0 ne {lux luy ldot pop pop} if
  189.      not smode and /smode exch def} bind def
  190. /BD {STh ssc} bind def
  191. /BU {STh neg ssc} bind def
  192. /BN {0 ssy neg rmoveto} bind def
  193.  
  194. /msinit {/sw 0 def /ftsz 12 def /smode 0 def /STh -3.6 def /fs 0 def
  195.  /offset 0 def /ldsp 4 def fonttable 1 get fontset E initmatrix
  196.  statusdict begin /waittimeout 360 def end} def
  197. /fontset {dup 0 get findfont /Eft exch def dup 1 get findfont /Bft exch
  198.  def dup 2 get findfont /Ift exch def 3 get findfont /BIft exch def} def
  199. /msu {20 div} bind def 
  200. /ssc {dup /ssy exch def 0 exch rmoveto} bind def
  201. /ssm {dup smode or /smode exch def} bind def
  202. /dul {cc true charpath pathbbox newpath exch pop 2 copy exch sub
  203.  2 mul /dulsp exch def 2 index 2 index moveto cx1 4 -1 roll sub
  204.  dup 0 rlineto 3 1 roll exch sub 0 exch rlineto neg 0 rlineto
  205.  closepath fill} bind def
  206. /ul {gsave /cc exch def currentpoint pop /cx1 exch def smode 4 ne
  207.  {ux uy} {sux suy} ifelse moveto dul {grestore gsave smode 4 ne
  208.  {ux uy} {sux suy} ifelse dulsp 2 gt {dulsp} {dulsp 2 mul} ifelse sub
  209.  moveto dul} if grestore} bind def
  210. /lsetup {x ldsp div round cvi ldsp mul /x exch def lux ldsp div
  211.  round cvi ldsp mul /lux exch def lux ldsp 2 div add luy moveto
  212.  x lux sub ldsp div cvi} bind def
  213. /ldot {gsave 2 copy currentpoint /y exch def /x exch def
  214.  newpath
  215.  ldmode 0 eq {1 setlinewidth 1 setlinecap x lsetup
  216.               {0 0 rlineto ldsp 0 rmoveto} repeat stroke pop pop pop}
  217.  {ldmode 1 eq {.1 setlinewidth lsetup 1 sub 0 (M) stringwidth pop 2.5
  218.                div rmoveto {ldsp 2 sub 0 rlineto 2 0 rmoveto} repeat
  219.                stroke pop pop}
  220.  {ldmode 2 eq {[] 0 setdash /offset 1.4 def .2 setlinewidth
  221.                offset sub moveto x y offset sub lineto stroke} if}
  222.  ifelse} ifelse grestore} def
  223. % /OrigName /NewName Foreign
  224. /Foreign {
  225.   exch findfont begin
  226.   currentdict dup length dict begin
  227.     { 1 index /FID ne {def} {pop pop} ifelse } forall
  228.     /FontName exch def
  229.     /Encoding foreignvec def
  230.   currentdict dup end end
  231.   /FontName get exch definefont pop
  232. } bind def
  233.  
  234. /foreignvec StandardEncoding 256 array copy def
  235. % the following are differences from StandardEncoding.
  236. % Sequential entries do not require indices:
  237. 0 [ 20/paragraph/section 39/quotesingle 96/grave
  238. 128/Ccedilla/udieresis/eacute/acircumflex/adieresis/agrave/aring/ccedilla
  239. /ecircumflex/edieresis/egrave/idieresis/icircumflex/igrave/Adieresis/Aring
  240. /Eacute/ae/AE/ocircumflex/odieresis/ograve/ucircumflex/ugrave/ydieresis
  241. /Odieresis/Udieresis/cent/sterling/yen/P/florin/aacute/iacute/oacute/uacute
  242. /ntilde/Ntilde/ordfeminine/ordmasculine/questiondown/.notdef/.notdef/half
  243. /quarter/exclamdown/guillemotleft/guillemotright/Aacute/Acircumflex/Agrave
  244. /Atilde/Ecircumflex/Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave
  245. /Oacute/Ocircumflex/Ograve/Otilde/Uacute/Ucircumflex/Ugrave/Scaron
  246. /Ydieresis/emdash/Zcaron/.notdef/otilde/scaron/zcaron/fraction/section
  247. /currency/quotesingle/quotedblleft/guilsinglleft/guilsinglright/quoteleft
  248. /quoteright/endash/dagger/daggerdbl/paragraph/quotesinglbase/quotedblbase
  249. /quotedblright/ellipsis/.notdef/grave/acute/circumflex/tilde/macron
  250. /germandbls/breve/dotaccent/dieresis/cedilla/.notdef/hungarumlaut/ogonek
  251. /caron/emdash/Lslash/Oslash/dotlessi/lslash/oslash/.notdef/.notdef/.notdef
  252. /.notdef/.notdef/atilde/.notdef/.notdef/ring/bullet/periodcentered/.notdef
  253. /.notdef/.notdef/.notdef/.notdef
  254. ] {dup type /nametype eq {dup /Courier findfont /CharStrings get
  255.    exch known not {pop /.notdef} if foreignvec 2 index 2 index put
  256.    pop 1 add} {exch pop} ifelse
  257.   } forall pop
  258.  
  259. %%BeginMakeForeign
  260. /Courier /Courier-F Foreign
  261. /Courier-Bold /Courier-Bold-F Foreign
  262. /Courier-Oblique /Courier-Oblique-F Foreign
  263. /Courier-BoldOblique /Courier-BoldOblique-F Foreign
  264. /Helvetica /Helvetica-F Foreign
  265. /Helvetica-Bold /Helvetica-Bold-F Foreign
  266. /Helvetica-Oblique /Helvetica-Oblique-F Foreign
  267. /Helvetica-BoldOblique /Helvetica-BoldOblique-F Foreign
  268. /AvantGarde-Book /AvantGarde-Book-F Foreign
  269. /AvantGarde-Demi /AvantGarde-Demi-F Foreign
  270. /AvantGarde-BookOblique /AvantGarde-BookOblique-F Foreign
  271. /AvantGarde-DemiOblique /AvantGarde-DemiOblique-F Foreign
  272. /Helvetica-Narrow /Helvetica-Narrow-F Foreign
  273. /Helvetica-Narrow-Bold /Helvetica-Narrow-Bold-F Foreign
  274. /Helvetica-Narrow-Oblique /Helvetica-Narrow-Oblique-F Foreign
  275. /Helvetica-Narrow-BoldOblique /Helvetica-Narrow-BoldOblique-F Foreign
  276. /Helvetica-Light /Helvetica-Light-F Foreign
  277. /Helvetica-Black /Helvetica-Black-F Foreign
  278. /Helvetica-LightOblique /Helvetica-LightOblique-F Foreign
  279. /Helvetica-BlackOblique /Helvetica-BlackOblique-F Foreign
  280. /Helvetica-Condensed /Helvetica-Condensed-F Foreign
  281. /Helvetica-Condensed-Bold /Helvetica-Condensed-Bold-F Foreign
  282. /Helvetica-Condensed-Oblique /Helvetica-Condensed-Oblique-F Foreign
  283. /Helvetica-Condensed-BoldObl /Helvetica-Condensed-BoldObl-F Foreign
  284. /Bookman-Light /Bookman-Light-F Foreign
  285. /Bookman-Demi /Bookman-Demi-F Foreign
  286. /Bookman-LightItalic /Bookman-LightItalic-F Foreign
  287. /Bookman-DemiItalic /Bookman-DemiItalic-F Foreign
  288. /Korinna-Regular /Korinna-Regular-F Foreign
  289. /Korinna-Bold /Korinna-Bold-F Foreign
  290. /Korinna-KursivRegular /Korinna-KursivRegular-F Foreign
  291. /Korinna-KursivBold /Korinna-KursivBold-F Foreign
  292. /Times-Roman /Times-Roman-F Foreign
  293. /Times-Bold /Times-Bold-F Foreign
  294. /Times-Italic /Times-Italic-F Foreign
  295. /Times-BoldItalic /Times-BoldItalic-F Foreign
  296. /NewCenturySchlbk-Roman /NewCenturySchlbk-Roman-F Foreign
  297. /NewCenturySchlbk-Bold /NewCenturySchlbk-Bold-F Foreign
  298. /NewCenturySchlbk-Italic /NewCenturySchlbk-Italic-F Foreign
  299. /NewCenturySchlbk-BoldItalic /NewCenturySchlbk-BoldItalic-F Foreign
  300. /Palatino-Roman /Palatino-Roman-F Foreign
  301. /Palatino-Bold /Palatino-Bold-F Foreign
  302. /Palatino-Italic /Palatino-Italic-F Foreign
  303. /Palatino-BoldItalic /Palatino-BoldItalic-F Foreign
  304. /Garamond-Light /Garamond-Light-F Foreign
  305. /Garamond-Bold /Garamond-Bold-F Foreign
  306. /Garamond-LightItalic /Garamond-LightItalic-F Foreign
  307. /Garamond-BoldItalic /Garamond-BoldItalic-F Foreign
  308. /AGaramond-Regular /AGaramond-Regular-F Foreign
  309. /AGaramond-Bold /AGaramond-Bold-F Foreign
  310. /AGaramond-Italic /AGaramond-Italic-F Foreign
  311. /AGaramond-BoldItalic /AGaramond-BoldItalic-F Foreign
  312. /ZapfChancery-MediumItalic /ZapfChancery-MediumItalic-F Foreign
  313. %%EndMakeForeign
  314.  
  315. /fonttable [
  316. 0 [/Courier-F /Courier-Bold-F /Courier-Oblique-F /Courier-BoldOblique-F]
  317. 8 [/Helvetica-F /Helvetica-Bold-F /Helvetica-Oblique-F /Helvetica-BoldOblique-F]
  318. 9 [/AvantGarde-Book-F /AvantGarde-Demi-F /AvantGarde-BookOblique-F /AvantGarde-DemiOblique-F]
  319. 10 [/Helvetica-Narrow-F /Helvetica-Narrow-Bold-F /Helvetica-Narrow-Oblique-F /Helvetica-Narrow-BoldOblique-F]
  320. 11 [/Helvetica-Light-F /Helvetica-Black-F /Helvetica-LightOblique-F /Helvetica-BlackOblique-F]
  321. 12 [/Helvetica-Condensed-F /Helvetica-Condensed-Bold-F /Helvetica-Condensed-Oblique-F /Helvetica-Condensed-BoldObl-F]
  322. 16 [/Bookman-Light-F /Bookman-Demi-F /Bookman-LightItalic-F /Bookman-DemiItalic-F]
  323. 18 [/Korinna-Regular-F /Korinna-Bold-F /Korinna-KursivRegular-F /Korinna-KursivBold-F]
  324. 24 [/Times-Roman-F /Times-Bold-F /Times-Italic-F /Times-BoldItalic-F]
  325. 25 [/NewCenturySchlbk-Roman-F /NewCenturySchlbk-Bold-F /NewCenturySchlbk-Italic-F /NewCenturySchlbk-BoldItalic-F]
  326. 26 [/Palatino-Roman-F /Palatino-Bold-F /Palatino-Italic-F /Palatino-BoldItalic-F]
  327. 28 [/Garamond-Light-F /Garamond-Bold-F /Garamond-LightItalic-F /Garamond-BoldItalic-F]
  328. 29 [/AGaramond-Regular-F /AGaramond-Bold-F /AGaramond-Italic-F /AGaramond-BoldItalic-F]
  329. 50 [/ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F /ZapfChancery-MediumItalic-F]
  330. 56 [/Symbol /Symbol /Symbol /Symbol]
  331. 57 [/LineDraw /LineDraw /LineDraw /LineDraw]
  332. 60 [/ZapfDingbats /ZapfDingbats /ZapfDingbats /ZapfDingbats]
  333. ] def
  334.  
  335. %%BeginGraphicsDefs
  336. /M {moveto} bind def
  337. /L {lineto} bind def
  338. /LH {currentpoint exch pop lineto} bind def
  339. /LV {currentpoint pop exch lineto} bind def
  340. /R {3 index 1 index 1 index 5 index 5 index 1 index M
  341.  L L L closepath pop pop} def
  342. /setpat {setscreen 100 div setgray} bind def
  343. /setgrayed {{dup mul exch dup mul add 1 exch sub} setpat} bind def
  344. /setbar {{pop} setpat} bind def
  345. /setcross {{2 copy gt {pop} {exch pop} ifelse} setpat} bind def
  346. /fi {1 -1 scale} bind def
  347. /II1 {save count /mscount exch def} bind def
  348. /II2 {userdict begin /showpage {} def /letter {} def
  349.   /legal {} def /a4 {} def /b5 {} def
  350.   /clear { {cleartomark count msdict /mscount get eq {exit} if} loop mark} def
  351.    mark} def
  352. /IT {pop restore} bind def
  353. /IX {exch msu exch msu neg ptop add translate} bind def
  354. /IS {div 3 1 roll div exch scale} bind def
  355. %%EndGraphicsDefs
  356. %%EndProcSet
  357. save /msdictstate exch def
  358. %%EndProlog
  359.